initevents
keyloop:
onHotKey 4 ;<-- TU WPISZ DOGODNY DLA SIEBIE KLAWISZ
gosub wsiadanie
goto keyloop
sub wsiadanie
event macro 1 0 za mna!
finditem  FEJYKB ;<--TU WPISZ id ZWIERZAKA (każda zmiana zwierzaka = konieczność zmiany tego wpisu)
set #lobjectid #findid
event macro 17 0 ;last object
return